﻿Public Class Order_food

    Private Sub Order_food_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Main.lblheader.Text = "បញ្ជាលក់មុខម្ហូប"
    End Sub

    Private Sub A01_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A01.Click
        A01.Hide()
        B01.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B01_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B01.Click
        A01.Show()
        B01.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A02_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A02.Click
        A02.Hide()
        B02.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B02_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B02.Click
        A02.Show()
        B02.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A03_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A03.Click
        A03.Hide()
        B03.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B03_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B03.Click
        A03.Show()
        B03.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A04_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A04.Click
        A04.Hide()
        B04.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B04_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B04.Click
        A04.Show()
        B04.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A05_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A05.Click
        A05.Hide()
        B05.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B05_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B05.Click
        A05.Show()
        B05.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A06_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A06.Click
        A06.Hide()
        B06.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B06_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B06.Click
        A06.Show()
        B06.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A07_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A07.Click
        A07.Hide()
        B07.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B07_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B07.Click
        A07.Show()
        B07.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A08_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A08.Click
        A08.Hide()
        B08.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B08_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B08.Click
        A08.Show()
        B08.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A09_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A09.Click
        A09.Hide()
        B09.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B09_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B09.Click
        A09.Show()
        B09.Hide()
        Dim frm As New Totalmoney
        frm.ShowDialog()
    End Sub

    Private Sub A10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A10.Click
        A10.Hide()
        B10.Show()

        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B10.Click
        A10.Show()
        B10.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A11.Click
        A11.Hide()
        B11.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B11.Click
        A11.Show()
        B11.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A12.Click
        A12.Hide()
        B12.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B12.Click
        A12.Show()
        B12.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A13.Click
        A13.Hide()
        B13.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B13.Click
        A13.Show()
        B13.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B14.Click
        
        A14.Show()
        B14.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A14.Click
        A14.Hide()
        B14.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub A15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A15.Click
        A15.Hide()
        B15.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B15.Click
        A15.Show()
        B15.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A16.Click
        A16.Hide()
        B16.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B16.Click
        A16.Show()
        B16.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A17_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A17.Click
        A17.Hide()
        B17.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B17_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B17.Click
        A17.Show()
        B17.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B18.Click
        A18.Show()
        B18.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A18.Click
     
        A18.Hide()
        B18.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub A19_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A19.Click
        A19.Hide()
        B19.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B19_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B19.Click
        A19.Show()
        B19.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A20.Click
        A20.Hide()
        B20.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B20.Click
        A20.Show()
        B20.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A22_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A22.Click
        A22.Hide()
        B22.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B22_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B22.Click
        A22.Show()
        B22.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B21_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B21.Click
        
        A21.Show()
        B21.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A21_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A21.Click
        A21.Hide()
        B21.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub A23_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A23.Click
        A23.Hide()
        B23.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B23_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B23.Click
        A23.Show()
        B23.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A24_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A24.Click
        A24.Hide()
        B24.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B24_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B24.Click
       
        A24.Show()
        B24.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A25_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A25.Click
        A25.Hide()
        B25.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B25_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B25.Click
        A25.Show()
        B25.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B26_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B26.Click
        A26.Hide()
        B26.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub A26_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A26.Click
        A26.Show()
        B26.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A27_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A27.Click
        A27.Hide()
        B27.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B27_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B27.Click
        A27.Show()
        B27.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B28_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B28.Click
    
        B28.Hide()
        A28.Show()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A28_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A28.Click
        A28.Hide()
        B28.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
     
    End Sub

    Private Sub A29_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A29.Click
        A29.Hide()
        B29.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B29_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B29.Click
        A29.Show()
        B29.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B30.Click
       
        A30.Show()
        B30.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A30_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A30.Click
        A30.Hide()
        B30.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B31_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B31.Click
        A31.Hide()
        B31.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
        
    End Sub

    Private Sub A31_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A31.Click
        A31.Show()
        B31.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub B32_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B32.Click
        A32.Show()
        B32.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A32_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A32.Click
       
        A32.Hide()
        B32.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B33_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B33.Click
        A33.Show()
        B33.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A33_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A33.Click
        
        A33.Hide()
        B33.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B34_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B34.Click
      
        A34.Show()
        B34.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A34_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A34.Click
        A34.Hide()
        B34.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B35_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B35.Click
      
        A35.Show()
        B35.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A35_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A35.Click
        A35.Hide()
        B35.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub

    Private Sub B36_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B36.Click
        A36.Show()
        B36.Hide()
        Totalmoney.ShowDialog()
    End Sub

    Private Sub A36_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A36.Click
      
        A36.Hide()
        B36.Show()
        sallfood.Close()
        sallfood.TopLevel = False
        Main.penelmain.Controls.Add(sallfood)
        sallfood.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        sallfood.WindowState = FormWindowState.Maximized
        sallfood.Show()
    End Sub
End Class